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SEPT. 1987 Editor-Frank Davis 


OCTOBER MEETING 

The next meeting of the Users Group ISTUG. will be at the 
home of David Hackstadt, The address is 5150 W. end Street, 
Indianapolis, IN 46224, The easiest way to get there for out оғ 
towners is tO take the 38th St, exit off of 465 West, then go 
east, This Puts you in the general neighborhood ( I've never 
been there), so for more complete directions give a neall to 
David. His home phone number is 317-297-4889. The meeting will 
Feature an opportunity for you to swap or sell oFF any excess 
hardware or software so come loaded, What one Person wants to 
get rid of сап well be the treasure another is wanting, David is 
а QL user so à good part of the meeting should slant in that 
direction, IF you have something you want to show OFF on the QL, 
now is à good chance, and if you are not familiar with the QL, 
then take this opportunity to become acquainted, The date of 
the meeting is October 24th at 1:30 PLM, 

The November meeting will be at the home of Ralph McCrum, 
in Mishawaka, on November 2156 at 1:30 Р.М. Directions іп the 
next newsletter, His home phone number is 219-256-5870. No 
meeting Planned for December, 


THIS-N-THAT 

Anyone interested in getting some dust cavers that are 
custom made, with logo, For your 7510909, 2Х81, TS264G,. 752068 OR 
YOUR GL! Then contact Paul Holmgren at either 5231 Wilton Wood 
ct. Indianapolis, In 46254, or phone 317-291-6002. He сап 
Probably save us all some money by doing a group buy, Check out 
the latest issue of Syncyare News and see Paul's award winning 
Program. 

On the subject of Syncyare News, Basil Wentworth, ISTUG 
member and frequent contributor to this newsletter will soon be 
taking over as Editor of Syncyare News, If you don't subscribe, 
all I can say is you are missing out on à good technical source 
OF data on our favorite computers, Contact me or Basil, for any 
details on how tO subscribe, We have a program by Basil in this 
issue called "WORDS IN LINE", type it in and have fun, 

For those who were worried about the legal hassles that 
Fred Nachbaur was having over immigration in Canada, rest a 
little easier, as it appears to have been resolved and he will 
not be deported, 

In а patriotic mood we also have а program that was 
Submitted by Joan Kealy, who updated it for the TS2668, called 
the "DECORATION OF INDEPENDENCE", What with Columbus Day, and 
Thanksgiving coming up, I thought it appropriate, Next issue has 
another program by Joan, This Shows us that Texas has more to 
offer than just Oil wells, as Joan is а retired school teacher 
who has not quit teaching, (she just has а larger classroom ), 

A reminder that dues are coming up for quite a feu of us 
and it is time to renew, If you Find ж beside your пате апа 
address label, you have one month left, Let's support ISTUG: so 
that it is still here to give support to all of us, By the way I 
Still would like to have formal elections for officers in ISTUG. 


` PRESS RELEASE 


TO BE RELEASED IMMEDIATELY 


We are pleased to announce the SUNSTATE TIMEX - SINCLAIR WINTERFEST '88 now 
being organized in the Orlando, Florida area. It will be Similiar to the two 
previous TIMEX - SINCLAIR fests where the vendors and speakers for this fine 
computer met previously. However it will be different in the fact that we are 
trying to make this the FIRST INTERNATIONAL SINCLAIR MEETING. Contacts are now 
being established to have groups from England come over to this side of the pond 
to see how we enjoy this little marvel. Another uniaue feature is that we have 
a dedicated BULLETIN BOARD set up. Called the SUNSTATE TIMEX - SINCLAIR 
BULLETIN SERVICE (904) 775-0093, it is a 300 baud 24 hour a day, 7 days a week 
information source on the most up to date information on the Fest. 
In charge are: 
Chairman - M.L. Johnson 
Vice-Chairman - Mel Nathanson 


Public Relations - Darrell Stec 


The contact address for information on the Fest is: 


SUNSTATE BULLETIN SERVICE 


249 N. HARDEN AVENUE, ORANGE CITY, FLORIDA 32763 


| For additional information concerning User Groups, contact: 
TIMEX - SINCLAIR USER GROUPS 
c/o Mel Nathanson 
7515 Arbordale Drive 
Port Richey, Florida 34668 


1813) 863-5552 


REM ORIGINALLY APPEARED IN FAMILY COMPUTING 


ا ا کے 

S337 CLS : PRINT AT 18,80; "###DECORATION OF INDEFENDENCEss»" 
5611 BORDER 2: INK 1: PAPER 7 

3012 ВЕЕР 1,10 

5@15 PRINT ''"THE ORIGINAL 13 COLONIES APPEAR IN THE ORDER THAT THEY ENTERED TH 
E UHIOH. FOLLOWED BY THE FLAG OF THE 13 COLONIES." 

26158 PAUSE S586 

5918 CLs 

528 DIM Bia? 

358159 DIM GEC ae: 

5040 DIM 5Ф{12) 


558558 DIM C$(13, 238} 

SESE LET Ceti) ="DELAWARE" 

$878 LET O$i2322'PEHNSYLUABGNIA " 
SESE LET C$i3)0-"MEW JERSEY" 

LET O£$(45-*'GEORGIR" 

GE LET CéiS)="CONNECTICUT” 

18 LET C#(4)="MNASSACHUSETTS" 
LET C$?) ="MARYLANG” 

LET СФ (Si ="SCUTH CAROLINA" 
LET ФОЕ "МЕМ NANT SHIRE" 
LET СҰ Cis ="VIRGINTIA" 

LET @$i113="NEW YORK" 

LET C$(12)z*HMORTH CAROLINA” 
LET C$í132-"'RHODE ISLAND” 
FOR F-1 TO 29 

LET B$:iF)-CHRE$ 143 

INK 2: LET G$(F)-zOHR$ I28 
NEXT Р: FOR FSL TO 12 

INK 1: LET SécCF)s =CHRE 143 
NEXT F: INK 1: FOR F=1 TO 13 
PRINT AT 8,193 * EL ж Il ОР. ESCOE re oy x 
PRINT AT 21.185;C$:F) 

LET RERND#S9+5 

FOR H=17 TO 5 STEP =f 
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218 PRINT AT H,RiCHR# 132:0T H,R;CHRS$ 32 
326 NEXT H 
5338 PRINT АТ 4,R;CHR$ 128:АТ S.R-1:CHR$ 134;AT 5.R-1;CHR$ 137;AT 3,R*1;CHR$ 137 
ГАТ S.R*1;CHRS 134 
5348 CLS 
5358 NEXT F: PRINT АТ 5,8; INK 2: FOR Fz1 TO 6 
5388 PRINT B$ 
5396 PRINT G$ 
5480 NEXT F 
541G PRINT B$ 


5429 PRINT AT 4,2; 
5430 FOR F=@ TO ó 
34409 INK 1: PRINT 5% 
S456 NEXT Р 

5555 INK 1 


5454 PRINT AT 5,05" . 
5457 PRINT AT 5,7: " . 
($468 INVERSE 1: PRINT AT E NOR 5,5; '&*; TAB. 7: " ** AT 6,4; " &" ; TAB. 8s" «5T 7, 
| 3;**'; TAB 9; "*";QT 8,3; " * 5 TAB 9; **iQT 9,6;  *'; TAB 8; "ж" АТ 10,5; " * TAB 7;"x* 


| 8455 INVERSE G 
5470 PRINT AT 21,15 REMEMBER: FOURTH OF JULY:1776" 
$5472 INPUT "AGAIN? Y/NH'";R$ 


5486 IF R$="" THEN GO TO 5488 
S452 IF R#="¥" THEN GO TO 5240 
9997 STOF 

958 SAVE "DECOR" LINE 5888 
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WORDS IN LINE 


by BASIL 


I've done a little music 
arranging recentiu, and I found 
a need for a program that would 
help me Line up the uords for 
Various stazas of a song. Like 


see 
seen 
band 


Oh Say, can you 
On the shore, dim-iu 
and where is that 


And thus be il ever 


(don’t feel bad if you didn't 
remember the third stanza--I 
had to look it up. toa). 


You start out with the 
program in Figure 1, adding 
more LET а... and GO SUB... 
tines as you need them. The 
32's in lines Sada and 5018 
(three of them? uill be 
replaced by the Line length of 
the printer you’re using. 


Then you fill in the words 
in the a$/5, as in Figure 2. A 
RUN of the Program Will nou 
give uou Figure S. and uou can 
easily see where you’ll have to 
insert spaces and hyphens to 
make the words or the several 
stanzas tine up. Eventually, 
цоо ії arrive at something Like 
Figure 4, which gives an output 
like Figure S. Of course, you 
can chop each a$ down to 32 
Characters {ог whatever Line 
length you're using), as any 
over that number won't be 


PRINTed, anyway. 
For the second Line, you 
add a PRINT, as at tine 4? (or 


you can leave one a$ Line 
blank}. Then you continue, as 
in Figure 6, which will print 
Figure 7, giving you tuo 
segments that can be spli d 
Side by side. Ог you won 
need this step if v 
full-size printer. 


10 LET a£$-z"Oh sau, сап you see 
by the daun'z" 

15 GO SUE Saza 

20 LET a$z"On the shore, dimiy 


seen through" 
25 GO SUE 5020 
30 LET a$="And where is that b 
and who so vauntingtiy" 
3S GO SUB 5288 
40 LET ag="And 
when free men" 
45 GO SUB 5888 


thus be it ever 


5g LET а= mm 
55 GO 508 Баве 
6@ LET a$z"" 


55 GO SUB бада 


Figure 2 


ре 


18 LET ag="" 
15 ERE 508 Saga 
М га а%= 39 23 
25 Go. 50В soga 
3e LET а= atz: 
35 Gû 50В Soga 
40 LET ag="" 
45 GO 508 saga 
50 LET ag="" 
55 GO SUE sega 
60 LET ag="" 
65 cO suB Saga 
78 LET as$z 123 53 
75 GO 508 Бега 
ва LET а%= ata: 
85 EE SUB seen 


LET 
105 GO 508  5eee 
110 LET ag="" 
115 art Saga 


4999 STOP $ 

S5020 IF LE a$: Se THEN PRINT a$ 
5010 IF LEN a$»z32 THEN PRINT а 
( TO 32?! rue Ў 


69990 STOP TE 
goaa SAVE "text" LINE 1 
9010 BEEP .3,12: BEEF 1,12 
9020 CLS : PRINT “re-play tape 
о VERIFY " 
92030 VERIFY "text" 
9040 PRINT AT 10,10; FLASH i;" 
ERIFY OK" 
9050 BEEF .3,8: BEEP 1,8 
` Figure 1 
' Oh sag, can you see by the dawn’ 


; On the shore, 


dimly seen through 
And where is that band who zo va 
And thus be it ever when Free me 


* 


Figure 3 


$ 


r+ 


U 


10 LET a$="0h sau, can y 
ou see by the dawns" 
15 GO SUB 5022 


28 LET ag="On the shore, dim-i Oh í 
y seen through" On XR $i 

25 co SUB 5020 | Beh. L'UBB UE Phones 

30 LET a$="“And where is t » En uer 


hat band who so vauntingly" 
35 GO SUE 50020 a 
40 LET ag="And ' thus be i 


сап you see by 

dim-iy seen thro 
is that band wha 
be it ever when 


t — ever when free men" Figure 5 
4 . 


5 GÛ SUB Бара 
5o LET as- TET 
55 60 SUB баада 
60 LET a$-"" 
65 cao 508 Soga 


Figure 4 


= 
ote "ri a$="0h Say, can y «| 


15° GO SUB Бога 
20 LET а$="Оп the shore, dim-i 
y REN SUB EDAD. 


30 LET ag="“And where is t 
hat band whe so vauntingiy" 
35 GO SUP 50980 
40 LET ag$="And thus be i 
t ever when free men" 
45 GO SUE 5822 
47 PRINT i 
50 LET ag=" the dawn’s ear- 
ly Light” 
55 GO SUB 5820 
6a ae иаа the mists of 


ou 


the deep" 
65 GO SUB soga 
70 LET ag=" so vaunt -ing- 
ty swore” 
75 GO SUB seea К 
80 LET a$- free men i 
shall stand” | 
85 GO SUB Sa@aa Р ^ 
ao LET а$= аз аз 
95 GO SUB 508 
12a LET а$= seas 
185 Go 508 sara І ; 
110 LET a$z"" 
1 
Figure 6 
Oh say, can gou see by the dawn’ s ear- 
Оп the сое; dim-iy seen through the miats E nba deeem 
And where is that band who 50 va es chalk stand 


And thus be it ever when free 


Figure 7 


ISTUG: Indiana SinclairTimex Users group, is a Not For Profit 

Group dedicated toO the educational use OF Sinclair and 
Timex-Sinclair Computers, .for both the hobbyist and. tha 
Professional user, We aim to dO this by keeping members 
informed of sources for software, peripherals, computer Shows, 
seminars and other educational events, we ery to keep 
members aware of other sources оғ program listings and tips, 
by means of providing a newsletter 11 times a year for members, 
Providing other newsletters obtained by user group SWAPS, and 


Providing а library of programs that are public domain to all 
Full members, Full membership $10 ; Associate $7.56 a year, 
Membership is offered in two ways: (1) Full membership, which 


entitles a member to all of the above, plus the full technical 
support of the Other members on both hardware and software, 
and the opportunity to attend meetings which are held eleven 
times а year, usually on the 4th Saturday of the month at 1:38 
Р.М. On months when a major holiday falis that weekend, the 
meeting will be on the 3rd weekend, No December meeting, (2) Is 
Associate membership, which entitles you to the newsletter (in 
which any member may place free ads) and Full support, 


4» оиы. С = مه‎ 


I.5.T.U.G. 
313 EAST MAIN ST. 
PERU: IN 46778 


